-- card: 19858 from stack: in.03 ะตะตะต -- bmap block id: 9624 -- flags: 0000 -- background id: 2766 -- name: ----- HyperTalk script ----- on openCard send cardOpened to background end openCard on move global direction,chase,blasting if direction = "north" then go to card id 3186 exit move end if if direction = "south" or direction ="rear" then answer "Going south leaves the game. Quit now?" with "yes"or"no" if it is "no" then exit move send quitGame to card id 10613 exit move end if pass move end move on closeCard set the cursor to 4 put "" into field 3 end closeCard on take global object,carried -- remember to update carried if you do not pass take pass take end take on drop global object,dropRoom,carried -- remember to update carried if you do not pass drop pass drop end drop on use global object,carried -- update carried if use results in loss of object pass use end use -- part 16 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=122 top=230 right=266 bottom=156 -- title width / last selected line: 0 -- icon id / first selected line: 9301 / 9301 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: knife ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a knife" into field 3 put false into examFlag end mouseUp -- part 17 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=89 top=230 right=266 bottom=123 -- title width / last selected line: 0 -- icon id / first selected line: 1015 / 1015 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: nodule ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a silicon sphere" into field 3 put false into examFlag end mouseUp -- part 18 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=122 top=195 right=231 bottom=156 -- title width / last selected line: 0 -- icon id / first selected line: 14953 / 14953 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ladder ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a rope ladder" into field 3 put false into examFlag end mouseUp -- part 19 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=158 top=230 right=266 bottom=192 -- title width / last selected line: 0 -- icon id / first selected line: 1019 / 1019 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: bomb ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a time bomb" into field 3 put false into examFlag end mouseUp -- part 20 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=55 top=230 right=266 bottom=89 -- title width / last selected line: 0 -- icon id / first selected line: 24317 / 24317 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: key ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a key" into field 3 put false into examFlag end mouseUp -- part 21 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=196 top=230 right=266 bottom=230 -- title width / last selected line: 0 -- icon id / first selected line: 7012 / 7012 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: gem ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a glowing gem" into field 3 put false into examFlag end mouseUp -- part 22 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=21 top=230 right=266 bottom=55 -- title width / last selected line: 0 -- icon id / first selected line: 23078 / 23078 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: orb ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a crystal orb" into field 3 put false into examFlag end mouseUp -- part 33 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=100 top=64 right=124 bottom=152 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp global examFlag,direction,cardID if examFlag then put "a tunnel leading north" into field 3 put false into examFlag else put "north" into direction send move to card id cardID end if end mouseUp -- part contents for background part 25 ----- text ----- Entrance Tunnel (looking north) -- part contents for background part 24 ----- text ----- You are in a tunnel running north and south. To the south you see daylight filtering in through the vegetation that almost totally obstructs the opening through which you entered the cave. -- part contents for background part 36 ----- text ----- 0